cd "/Users/firatbilgel/Documents/Journal articles/Identification"
import delimited "/Users/firatbilgel/Documents/Journal articles/Identification/nc_recid.csv", clear
drop v1
rename (recid prisontime race age gender alcohol drugs school married priors felony property personal) (y t r a g b d s m p f x_1 x_2)
set seed 3131
**** Valid Adjustment set {f,r,d,m,s,g,x_1,x_2}
ivprobit y f x_1 x_2 r g m d s (t = a), first vce(boot, reps(500))
margins, dydx(t) predict(pr)
margins, eydx(t) predict(pr)
**** Invalid Adjustment set {f,r,d,m,s,g,x_1,x_2,b,p}
eststo: ivprobit y f p x_1 x_2 r g m d s b (t = a), first vce(boot, reps(500))
esttab using ivprobit_SARR.tex, b(3) se(3) star(* 0.10 ** 0.05 *** 0.01) wide onecell sfmt(a4) replace 
margins, dydx(t) predict(pr)
margins, eydx(t) predict(pr)
eststo clear
